/ CyberMycha 2004 August / CyberMycha 08-2004 (Poland).bin / Spiderman2 / MainApp.cab / GUI.u / ScriptText23.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 40 55 2f 2f 20 3d 3d 3d |........|@U// ===|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 0d 0a 2f 2f 20 20 43 | 6c 61 73 73 3a 20 20 47 |=..//  C|lass:  G|
|00000060| 55 49 2e 47 55 49 43 69 | 72 63 75 6c 61 72 4c 69 |UI.GUICi|rcularLi|
|00000070| 73 74 0d 0a 2f 2f 20 20 | 50 61 72 65 6e 74 3a 20 |st..//  |Parent: |
|00000080| 47 55 49 2e 47 55 49 4c | 69 73 74 42 61 73 65 0d |GUI.GUIL|istBase.|
|00000090| 0a 2f 2f 0d 0a 2f 2f 20 | 20 3c 45 6e 74 65 72 20 |.//..// | <Enter |
|000000a0| 61 20 64 65 73 63 72 69 | 70 74 69 6f 6e 20 68 65 |a descri|ption he|
|000000b0| 72 65 3e 0d 0a 2f 2f 20 | 3d 3d 3d 3d 3d 3d 3d 3d |re>..// |========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0a 0d 0a |========|====....|
|00000100| 63 6c 61 73 73 20 47 55 | 49 43 69 72 63 75 6c 61 |class GU|ICircula|
|00000110| 72 4c 69 73 74 20 65 78 | 74 65 6e 64 73 20 47 55 |rList ex|tends GU|
|00000120| 49 4c 69 73 74 42 61 73 | 65 0d 0a 09 4e 61 74 69 |IListBas|e...Nati|
|00000130| 76 65 3b 0d 0a 0d 0a 2f | 2f 20 28 63 70 70 74 65 |ve;..../|/ (cppte|
|00000140| 78 74 29 0d 0a 2f 2f 20 | 28 63 70 70 74 65 78 74 |xt)..// |(cpptext|
|00000150| 29 0d 0a 2f 2f 20 28 63 | 70 70 74 65 78 74 29 0d |)..// (c|pptext).|
|00000160| 0a 2f 2f 20 28 63 70 70 | 74 65 78 74 29 0d 0a 09 |.// (cpp|text)...|
|00000170| 09 0d 0a 76 61 72 09 09 | 62 6f 6f 6c 09 09 62 43 |...var..|bool..bC|
|00000180| 65 6e 74 65 72 49 6e 42 | 6f 75 6e 64 73 3b 09 09 |enterInB|ounds;..|
|00000190| 2f 2f 20 43 65 6e 74 65 | 72 20 74 68 65 20 6c 69 |// Cente|r the li|
|000001a0| 73 74 20 69 6e 20 74 68 | 65 20 62 6f 75 6e 64 69 |st in th|e boundi|
|000001b0| 6e 67 20 62 6f 78 0d 0a | 76 61 72 09 09 62 6f 6f |ng box..|var..boo|
|000001c0| 6c 09 09 62 46 69 6c 6c | 42 6f 75 6e 64 73 3b 09 |l..bFill|Bounds;.|
|000001d0| 09 09 2f 2f 20 49 66 20 | 74 72 75 65 2c 20 74 68 |..// If |true, th|
|000001e0| 65 20 6c 69 73 74 20 77 | 69 6c 6c 20 74 61 6b 65 |e list w|ill take|
|000001f0| 20 75 70 20 74 68 65 20 | 77 68 6f 6c 65 20 62 6f | up the |whole bo|
|00000200| 75 6e 64 69 6e 67 20 62 | 6f 78 0d 0a 76 61 72 09 |unding b|ox..var.|
|00000210| 09 62 6f 6f 6c 09 09 62 | 49 67 6e 6f 72 65 42 61 |.bool..b|IgnoreBa|
|00000220| 63 6b 43 6c 69 63 6b 3b | 09 09 2f 2f 20 49 66 20 |ckClick;|..// If |
|00000230| 74 72 75 65 2c 20 77 69 | 6c 6c 20 69 67 6e 6f 72 |true, wi|ll ignor|
|00000240| 65 20 61 6e 79 20 63 6c | 69 63 6b 20 6f 6e 20 62 |e any cl|ick on b|
|00000250| 61 63 6b 20 72 65 67 69 | 6f 6e 0d 0a 76 61 72 09 |ack regi|on..var.|
|00000260| 09 62 6f 6f 6c 09 09 62 | 41 6c 6c 6f 77 53 65 6c |.bool..b|AllowSel|
|00000270| 65 63 74 45 6d 70 74 79 | 3b 09 09 2f 2f 20 49 66 |ectEmpty|;..// If|
|00000280| 20 74 72 75 65 2c 20 61 | 6c 6c 6f 77 73 20 73 65 | true, a|llows se|
|00000290| 6c 65 63 74 69 6f 6e 20 | 6f 66 20 65 6d 70 74 79 |lection |of empty|
|000002a0| 20 73 6c 6f 74 73 0d 0a | 76 61 72 09 09 69 6e 74 | slots..|var..int|
|000002b0| 09 09 09 46 69 78 65 64 | 49 74 65 6d 73 50 65 72 |...Fixed|ItemsPer|
|000002c0| 50 61 67 65 3b 09 09 2f | 2f 20 54 68 65 72 65 20 |Page;../|/ There |
|000002d0| 61 72 65 20 61 20 66 69 | 78 65 64 20 6e 75 6d 62 |are a fi|xed numb|
|000002e0| 65 72 20 6f 66 20 69 74 | 65 6d 73 20 69 6e 20 74 |er of it|ems in t|
|000002f0| 68 65 20 6c 69 73 74 0d | 0a 0d 0a 66 75 6e 63 74 |he list.|...funct|
|00000300| 69 6f 6e 20 49 6e 69 74 | 43 6f 6d 70 6f 6e 65 6e |ion Init|Componen|
|00000310| 74 28 47 55 49 43 6f 6e | 74 72 6f 6c 6c 65 72 20 |t(GUICon|troller |
|00000320| 4d 79 43 6f 6e 74 72 6f | 6c 6c 65 72 2c 20 47 55 |MyContro|ller, GU|
|00000330| 49 43 6f 6d 70 6f 6e 65 | 6e 74 20 4d 79 4f 77 6e |ICompone|nt MyOwn|
|00000340| 65 72 29 0d 0a 7b 0d 0a | 09 53 75 70 65 72 2e 49 |er)..{..|.Super.I|
|00000350| 6e 69 74 63 6f 6d 70 6f | 6e 65 6e 74 28 4d 79 43 |nitcompo|nent(MyC|
|00000360| 6f 6e 74 72 6f 6c 6c 65 | 72 2c 20 4d 79 4f 77 6e |ontrolle|r, MyOwn|
|00000370| 65 72 29 3b 0d 0a 0d 0a | 09 2f 2f 20 53 61 6e 69 |er);....|.// Sani|
|00000380| 74 79 0d 0a 09 0d 0a 09 | 69 66 20 28 62 46 69 6c |ty......|if (bFil|
|00000390| 6c 42 6f 75 6e 64 73 29 | 0d 0a 09 09 62 43 65 6e |lBounds)|....bCen|
|000003a0| 74 65 72 49 6e 42 6f 75 | 6e 64 73 3d 66 61 6c 73 |terInBou|nds=fals|
|000003b0| 65 3b 0d 0a 0d 0a 09 69 | 66 20 28 21 62 41 6c 6c |e;.....i|f (!bAll|
|000003c0| 6f 77 53 65 6c 65 63 74 | 45 6d 70 74 79 20 26 26 |owSelect|Empty &&|
|000003d0| 20 49 74 65 6d 43 6f 75 | 6e 74 20 3d 3d 20 30 29 | ItemCou|nt == 0)|
|000003e0| 0d 0a 09 09 49 6e 64 65 | 78 20 3d 20 2d 31 3b 0d |....Inde|x = -1;.|
|000003f0| 0a 0d 0a 09 4f 6e 4b 65 | 79 45 76 65 6e 74 3d 49 |....OnKe|yEvent=I|
|00000400| 6e 74 65 72 6e 61 6c 4f | 6e 4b 65 79 45 76 65 6e |nternalO|nKeyEven|
|00000410| 74 3b 0d 0a 09 4f 6e 58 | 43 6f 6e 74 72 6f 6c 6c |t;...OnX|Controll|
|00000420| 65 72 45 76 65 6e 74 3d | 49 6e 74 65 72 6e 61 6c |erEvent=|Internal|
|00000430| 4f 6e 58 43 6f 6e 74 72 | 6f 6c 6c 65 72 45 76 65 |OnXContr|ollerEve|
|00000440| 6e 74 3b 0d 0a 09 4f 6e | 43 6c 69 63 6b 3d 49 6e |nt;...On|Click=In|
|00000450| 74 65 72 6e 61 6c 4f 6e | 43 6c 69 63 6b 3b 0d 0a |ternalOn|Click;..|
|00000460| 7d 09 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 66 |}.....fu|nction f|
|00000470| 6c 6f 61 74 20 43 61 6c | 63 75 6c 61 74 65 4f 66 |loat Cal|culateOf|
|00000480| 66 73 65 74 28 66 6c 6f | 61 74 20 4d 6f 75 73 65 |fset(flo|at Mouse|
|00000490| 58 29 0d 0a 7b 0d 0a 09 | 6c 6f 63 61 6c 20 66 6c |X)..{...|local fl|
|000004a0| 6f 61 74 20 78 2c 78 31 | 2c 78 32 2c 57 69 64 74 |oat x,x1|,x2,Widt|
|000004b0| 68 2c 78 4d 6f 64 3b 0d | 0a 09 6c 6f 63 61 6c 20 |h,xMod;.|..local |
|000004c0| 69 6e 74 20 69 3b 0d 0a | 0d 0a 09 78 31 20 3d 20 |int i;..|...x1 = |
|000004d0| 43 6c 69 65 6e 74 42 6f | 75 6e 64 73 5b 30 5d 3b |ClientBo|unds[0];|
|000004e0| 0d 0a 09 78 32 20 3d 20 | 43 6c 69 65 6e 74 42 6f |...x2 = |ClientBo|
|000004f0| 75 6e 64 73 5b 32 5d 3b | 0d 0a 0d 0a 09 69 66 20 |unds[2];|.....if |
|00000500| 28 20 28 4d 6f 75 73 65 | 58 3c 78 31 29 20 7c 7c |( (Mouse|X<x1) |||
|00000510| 20 28 4d 6f 75 73 65 58 | 3e 78 32 29 20 29 0d 0a | (MouseX|>x2) )..|
|00000520| 09 09 72 65 74 75 72 6e | 20 2d 31 2e 30 3b 0d 0a |..return| -1.0;..|
|00000530| 09 0d 0a 09 77 69 64 74 | 68 20 3d 20 78 32 2d 78 |....widt|h = x2-x|
|00000540| 31 3b 0d 0a 09 09 20 0d | 0a 09 69 66 20 28 20 28 |1;.... .|..if ( (|
|00000550| 62 43 65 6e 74 65 72 49 | 6e 42 6f 75 6e 64 73 29 |bCenterI|nBounds)|
|00000560| 20 26 26 20 28 49 74 65 | 6d 73 50 65 72 50 61 67 | && (Ite|msPerPag|
|00000570| 65 2a 49 74 65 6d 57 69 | 64 74 68 3c 57 69 64 74 |e*ItemWi|dth<Widt|
|00000580| 68 29 20 29 0d 0a 09 7b | 0d 0a 09 0d 0a 09 09 78 |h) )...{|.......x|
|00000590| 4d 6f 64 20 3d 20 28 57 | 69 64 74 68 20 2d 20 28 |Mod = (W|idth - (|
|000005a0| 49 74 65 6d 73 50 65 72 | 50 61 67 65 2a 49 74 65 |ItemsPer|Page*Ite|
|000005b0| 6d 57 69 64 74 68 29 29 | 20 2f 20 32 3b 0d 0a 09 |mWidth))| / 2;...|
|000005c0| 09 78 31 2b 3d 78 4d 6f | 64 3b 0d 0a 09 09 78 32 |.x1+=xMo|d;....x2|
|000005d0| 2d 3d 78 4d 6f 64 3b 0d | 0a 09 0d 0a 09 09 69 66 |-=xMod;.|......if|
|000005e0| 20 28 20 28 4d 6f 75 73 | 65 58 3e 3d 78 31 29 20 | ( (Mous|eX>=x1) |
|000005f0| 26 26 20 28 4d 6f 75 73 | 65 58 3c 3d 78 32 29 20 |&& (Mous|eX<=x2) |
|00000600| 29 0d 0a 09 09 09 72 65 | 74 75 72 6e 20 28 4d 6f |).....re|turn (Mo|
|00000610| 75 73 65 58 2d 78 31 29 | 20 2f 20 49 74 65 6d 57 |useX-x1)| / ItemW|
|00000620| 69 64 74 68 3b 0d 0a 09 | 09 65 6c 73 65 0d 0a 09 |idth;...|.else...|
|00000630| 09 09 72 65 74 75 72 6e | 20 2d 31 3b 0d 0a 09 7d |..return| -1;...}|
|00000640| 0d 0a 09 0d 0a 09 69 66 | 20 28 20 28 62 46 69 6c |......if| ( (bFil|
|00000650| 6c 42 6f 75 6e 64 73 29 | 20 26 26 20 28 49 74 65 |lBounds)| && (Ite|
|00000660| 6d 73 50 65 72 50 61 67 | 65 2a 49 74 65 6d 57 69 |msPerPag|e*ItemWi|
|00000670| 64 74 68 3c 57 69 64 74 | 68 29 20 29 0d 0a 09 7b |dth<Widt|h) )...{|
|00000680| 0d 0a 09 09 78 4d 6f 64 | 20 3d 20 28 57 69 64 74 |....xMod| = (Widt|
|00000690| 68 20 2d 20 28 49 74 65 | 6d 73 50 65 72 50 61 67 |h - (Ite|msPerPag|
|000006a0| 65 2a 49 74 65 6d 57 69 | 64 74 68 29 29 20 2f 20 |e*ItemWi|dth)) / |
|000006b0| 49 74 65 6d 73 50 65 72 | 50 61 67 65 3b 0d 0a 09 |ItemsPer|Page;...|
|000006c0| 09 0d 0a 09 09 69 20 3d | 20 30 3b 0d 0a 09 09 78 |.....i =| 0;....x|
|000006d0| 20 3d 20 78 31 3b 0d 0a | 09 09 77 68 69 6c 65 20 | = x1;..|..while |
|000006e0| 28 78 3c 3d 78 32 29 0d | 0a 09 09 7b 0d 0a 09 09 |(x<=x2).|...{....|
|000006f0| 09 69 66 20 28 28 4d 6f | 75 73 65 58 3e 3d 78 29 |.if ((Mo|useX>=x)|
|00000700| 20 26 26 20 28 4d 6f 75 | 73 65 58 3c 3d 78 2b 49 | && (Mou|seX<=x+I|
|00000710| 74 65 6d 57 69 64 74 68 | 29 20 29 0d 0a 09 09 09 |temWidth|) ).....|
|00000720| 09 72 65 74 75 72 6e 20 | 69 3b 0d 0a 09 09 09 0d |.return |i;......|
|00000730| 0a 09 09 09 69 2b 2b 3b | 0d 0a 09 09 09 78 2b 3d |....i++;|.....x+=|
|00000740| 20 49 74 65 6d 57 69 64 | 74 68 2b 78 6d 6f 64 3b | ItemWid|th+xmod;|
|00000750| 0d 0a 09 09 7d 20 0d 0a | 09 09 0d 0a 09 09 72 65 |....} ..|......re|
|00000760| 74 75 72 6e 20 2d 31 3b | 0d 0a 09 7d 0d 0a 09 0d |turn -1;|...}....|
|00000770| 0a 09 72 65 74 75 72 6e | 20 28 4d 6f 75 73 65 58 |..return| (MouseX|
|00000780| 2d 78 31 29 2f 49 74 65 | 6d 57 69 64 74 68 3b 0d |-x1)/Ite|mWidth;.|
|00000790| 0a 09 09 09 09 09 09 0d | 0a 7d 0d 0a 09 09 0d 0a |........|.}......|
|000007a0| 66 75 6e 63 74 69 6f 6e | 20 62 6f 6f 6c 20 49 6e |function| bool In|
|000007b0| 74 65 72 6e 61 6c 4f 6e | 43 6c 69 63 6b 28 47 55 |ternalOn|Click(GU|
|000007c0| 49 43 6f 6d 70 6f 6e 65 | 6e 74 20 53 65 6e 64 65 |ICompone|nt Sende|
|000007d0| 72 29 0d 0a 7b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |r)..{...|local in|
|000007e0| 74 20 4e 65 77 49 6e 64 | 65 78 2c 20 43 6f 6c 3b |t NewInd|ex, Col;|
|000007f0| 0d 0a 0d 0a 09 69 66 20 | 28 20 28 20 21 49 73 49 |.....if |( ( !IsI|
|00000800| 6e 43 6c 69 65 6e 74 42 | 6f 75 6e 64 73 28 29 20 |nClientB|ounds() |
|00000810| 29 20 7c 7c 20 28 49 74 | 65 6d 73 50 65 72 50 61 |) || (It|emsPerPa|
|00000820| 67 65 3d 3d 30 29 20 29 | 0d 0a 09 09 72 65 74 75 |ge==0) )|....retu|
|00000830| 72 6e 20 66 61 6c 73 65 | 3b 0d 0a 09 09 0d 0a 09 |rn false|;.......|
|00000840| 2f 2f 20 47 65 74 20 74 | 68 65 20 43 6f 6c 0d 0a |// Get t|he Col..|
|00000850| 0d 0a 09 43 6f 6c 20 3d | 20 43 61 6c 63 75 6c 61 |...Col =| Calcula|
|00000860| 74 65 4f 66 66 73 65 74 | 28 43 6f 6e 74 72 6f 6c |teOffset|(Control|
|00000870| 6c 65 72 2e 4d 6f 75 73 | 65 58 29 3b 0d 0a 0d 0a |ler.Mous|eX);....|
|00000880| 09 4e 65 77 49 6e 64 65 | 78 20 3d 20 28 54 6f 70 |.NewInde|x = (Top|
|00000890| 20 2b 20 43 6f 6c 29 20 | 25 20 49 74 65 6d 43 6f | + Col) |% ItemCo|
|000008a0| 75 6e 74 3b 0d 0a 09 0d | 0a 09 2f 2f 20 4b 65 65 |unt;....|..// Kee|
|000008b0| 70 20 73 65 6c 65 63 74 | 65 64 20 69 6e 64 65 78 |p select|ed index|
|000008c0| 20 69 6e 20 72 61 6e 67 | 65 0d 0a 09 69 66 20 28 | in rang|e...if (|
|000008d0| 4e 65 77 49 6e 64 65 78 | 20 3d 3d 20 2d 31 20 26 |NewIndex| == -1 &|
|000008e0| 26 20 62 49 67 6e 6f 72 | 65 42 61 63 6b 43 6c 69 |& bIgnor|eBackCli|
|000008f0| 63 6b 29 0d 0a 09 09 72 | 65 74 75 72 6e 20 66 61 |ck)....r|eturn fa|
|00000900| 6c 73 65 3b 0d 0a 09 09 | 0d 0a 09 2f 2f 20 63 68 |lse;....|...// ch|
|00000910| 65 63 6b 20 69 66 20 61 | 6c 6c 6f 77 65 64 20 74 |eck if a|llowed t|
|00000920| 6f 20 67 6f 20 6f 75 74 | 20 6f 66 20 72 61 6e 67 |o go out| of rang|
|00000930| 65 0d 0a 09 69 66 20 28 | 20 28 21 62 41 6c 6c 6f |e...if (| (!bAllo|
|00000940| 77 53 65 6c 65 63 74 45 | 6d 70 74 79 29 20 0d 0a |wSelectE|mpty) ..|
|00000950| 09 09 26 26 20 28 20 28 | 4e 65 77 49 6e 64 65 78 |..&& ( (|NewIndex|
|00000960| 20 3e 3d 20 30 29 20 26 | 26 20 28 4e 65 77 49 6e | >= 0) &|& (NewIn|
|00000970| 64 65 78 20 3e 20 49 74 | 65 6d 43 6f 75 6e 74 20 |dex > It|emCount |
|00000980| 2d 20 31 29 29 0d 0a 09 | 09 29 20 0d 0a 09 09 72 |- 1))...|.) ....r|
|00000990| 65 74 75 72 6e 20 66 61 | 6c 73 65 3b 0d 0a 0d 0a |eturn fa|lse;....|
|000009a0| 09 53 65 74 49 6e 64 65 | 78 28 4e 65 77 49 6e 64 |.SetInde|x(NewInd|
|000009b0| 65 78 29 3b 0d 0a 09 72 | 65 74 75 72 6e 20 74 72 |ex);...r|eturn tr|
|000009c0| 75 65 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |ue;..}..|..functi|
|000009d0| 6f 6e 20 62 6f 6f 6c 20 | 49 6e 74 65 72 6e 61 6c |on bool |Internal|
|000009e0| 4f 6e 4b 65 79 45 76 65 | 6e 74 28 6f 75 74 20 62 |OnKeyEve|nt(out b|
|000009f0| 79 74 65 20 4b 65 79 2c | 20 6f 75 74 20 62 79 74 |yte Key,| out byt|
|00000a00| 65 20 53 74 61 74 65 2c | 20 66 6c 6f 61 74 20 64 |e State,| float d|
|00000a10| 65 6c 74 61 29 0d 0a 7b | 0d 0a 0d 0a 09 69 66 20 |elta)..{|.....if |
|00000a20| 28 49 74 65 6d 73 50 65 | 72 50 61 67 65 3d 3d 30 |(ItemsPe|rPage==0|
|00000a30| 29 20 72 65 74 75 72 6e | 20 66 61 6c 73 65 3b 0d |) return| false;.|
|00000a40| 0a 0d 0a 09 0d 0a 09 69 | 66 20 28 20 28 4b 65 79 |.......i|f ( (Key|
|00000a50| 3d 3d 30 78 32 35 20 7c | 7c 20 4b 65 79 3d 3d 30 |==0x25 ||| Key==0|
|00000a60| 78 36 34 29 20 26 26 20 | 28 53 74 61 74 65 3d 3d |x64) && |(State==|
|00000a70| 31 29 20 29 09 2f 2f 20 | 4c 65 66 74 20 41 72 72 |1) ).// |Left Arr|
|00000a80| 6f 77 0d 0a 09 7b 0d 0a | 09 09 53 63 72 6f 6c 6c |ow...{..|..Scroll|
|00000a90| 4c 65 66 74 28 29 3b 0d | 0a 09 09 72 65 74 75 72 |Left();.|...retur|
|00000aa0| 6e 20 74 72 75 65 3b 0d | 0a 09 7d 0d 0a 09 0d 0a |n true;.|..}.....|
|00000ab0| 09 69 66 20 28 20 28 4b | 65 79 3d 3d 30 78 32 37 |.if ( (K|ey==0x27|
|00000ac0| 20 7c 7c 20 4b 65 79 3d | 3d 30 78 36 36 29 20 26 | || Key=|=0x66) &|
|00000ad0| 26 20 28 53 74 61 74 65 | 3d 3d 31 29 20 29 20 2f |& (State|==1) ) /|
|00000ae0| 2f 20 4c 65 66 74 20 41 | 72 72 6f 77 0d 0a 09 7b |/ Left A|rrow...{|
|00000af0| 0d 0a 09 09 53 63 72 6f | 6c 6c 52 69 67 68 74 28 |....Scro|llRight(|
|00000b00| 29 3b 0d 0a 09 09 72 65 | 74 75 72 6e 20 74 72 75 |);....re|turn tru|
|00000b10| 65 3b 0d 0a 09 7d 0d 0a | 09 0d 0a 09 69 66 20 28 |e;...}..|....if (|
|00000b20| 20 28 4b 65 79 3d 3d 30 | 78 32 34 20 7c 7c 20 4b | (Key==0|x24 || K|
|00000b30| 65 79 3d 3d 30 78 36 37 | 29 20 26 26 20 28 53 74 |ey==0x67|) && (St|
|00000b40| 61 74 65 3d 3d 31 29 20 | 29 20 2f 2f 20 48 6f 6d |ate==1) |) // Hom|
|00000b50| 65 0d 0a 09 7b 0d 0a 09 | 09 48 6f 6d 65 28 29 3b |e...{...|.Home();|
|00000b60| 0d 0a 09 09 72 65 74 75 | 72 6e 20 74 72 75 65 3b |....retu|rn true;|
|00000b70| 0d 0a 09 7d 0d 0a 09 0d | 0a 09 69 66 20 28 20 28 |...}....|..if ( (|
|00000b80| 4b 65 79 3d 3d 30 78 32 | 33 20 7c 7c 20 4b 65 79 |Key==0x2|3 || Key|
|00000b90| 3d 3d 30 78 36 31 29 20 | 26 26 20 28 53 74 61 74 |==0x61) |&& (Stat|
|00000ba0| 65 3d 3d 31 29 20 29 20 | 2f 2f 20 45 6e 64 0d 0a |e==1) ) |// End..|
|00000bb0| 09 7b 0d 0a 09 09 45 6e | 64 28 29 3b 0d 0a 09 09 |.{....En|d();....|
|00000bc0| 72 65 74 75 72 6e 20 74 | 72 75 65 3b 0d 0a 09 7d |return t|rue;...}|
|00000bd0| 0d 0a 09 0d 0a 09 69 66 | 20 28 20 28 6b 65 79 3d |......if| ( (key=|
|00000be0| 3d 30 78 45 43 29 20 26 | 26 20 28 53 74 61 74 65 |=0xEC) &|& (State|
|00000bf0| 3d 3d 33 29 20 29 0d 0a | 09 7b 0d 0a 09 0d 0a 09 |==3) )..|.{......|
|00000c00| 09 57 68 65 65 6c 55 70 | 28 29 3b 0d 0a 09 09 72 |.WheelUp|();....r|
|00000c10| 65 74 75 72 6e 20 74 72 | 75 65 3b 0d 0a 09 7d 0d |eturn tr|ue;...}.|
|00000c20| 0a 09 0d 0a 09 69 66 20 | 28 20 28 6b 65 79 3d 3d |.....if |( (key==|
|00000c30| 30 78 45 44 29 20 26 26 | 20 28 53 74 61 74 65 3d |0xED) &&| (State=|
|00000c40| 3d 33 29 20 29 0d 0a 09 | 7b 0d 0a 09 0d 0a 09 09 |=3) )...|{.......|
|00000c50| 57 68 65 65 6c 44 6f 77 | 6e 28 29 3b 0d 0a 09 09 |WheelDow|n();....|
|00000c60| 72 65 74 75 72 6e 20 74 | 72 75 65 3b 0d 0a 09 7d |return t|rue;...}|
|00000c70| 0d 0a 09 0d 0a 09 0d 0a | 09 72 65 74 75 72 6e 20 |........|.return |
|00000c80| 66 61 6c 73 65 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |false;..|}....fun|
|00000c90| 63 74 69 6f 6e 20 62 6f | 6f 6c 20 49 6e 74 65 72 |ction bo|ol Inter|
|00000ca0| 6e 61 6c 4f 6e 58 43 6f | 6e 74 72 6f 6c 6c 65 72 |nalOnXCo|ntroller|
|00000cb0| 45 76 65 6e 74 28 62 79 | 74 65 20 49 64 2c 20 65 |Event(by|te Id, e|
|00000cc0| 58 43 6f 6e 74 72 6f 6c | 6c 65 72 43 6f 64 65 73 |XControl|lerCodes|
|00000cd0| 20 69 43 6f 64 65 29 0d | 0a 7b 0d 0a 0d 0a 09 69 | iCode).|.{.....i|
|00000ce0| 66 20 28 49 74 65 6d 73 | 50 65 72 50 61 67 65 3d |f (Items|PerPage=|
|00000cf0| 3d 30 29 20 72 65 74 75 | 72 6e 20 66 61 6c 73 65 |=0) retu|rn false|
|00000d00| 3b 0d 0a 0d 0a 09 69 66 | 20 28 69 43 6f 64 65 3d |;.....if| (iCode=|
|00000d10| 3d 58 43 5f 4c 65 66 74 | 20 7c 7c 20 69 43 6f 64 |=XC_Left| || iCod|
|00000d20| 65 3d 3d 58 43 5f 50 61 | 64 4c 65 66 74 29 0d 0a |e==XC_Pa|dLeft)..|
|00000d30| 20 20 20 20 7b 0d 0a 20 | 20 20 20 09 53 63 72 6f |    {.. |   .Scro|
|00000d40| 6c 6c 4c 65 66 74 28 29 | 3b 0d 0a 20 20 20 20 20 |llLeft()|;..     |
|00000d50| 20 20 20 72 65 74 75 72 | 6e 20 74 72 75 65 3b 0d |   retur|n true;.|
|00000d60| 0a 20 20 20 20 7d 0d 0a | 20 20 20 20 65 6c 73 65 |.    }..|    else|
|00000d70| 20 69 66 20 28 69 43 6f | 64 65 3d 3d 58 43 5f 52 | if (iCo|de==XC_R|
|00000d80| 69 67 68 74 20 7c 7c 20 | 69 43 6f 64 65 3d 3d 58 |ight || |iCode==X|
|00000d90| 43 5f 50 61 64 52 69 67 | 68 74 29 0d 0a 20 20 20 |C_PadRig|ht)..   |
|00000da0| 20 7b 0d 0a 20 20 20 20 | 09 53 63 72 6f 6c 6c 52 | {..    |.ScrollR|
|00000db0| 69 67 68 74 28 29 3b 0d | 0a 20 20 20 20 20 20 20 |ight();.|.       |
|00000dc0| 20 72 65 74 75 72 6e 20 | 74 72 75 65 3b 0d 0a 20 | return |true;.. |
|00000dd0| 20 20 20 7d 0d 0a 0d 0a | 20 20 20 20 65 6c 73 65 |   }....|    else|
|00000de0| 20 69 66 20 28 69 43 6f | 64 65 3d 3d 58 43 5f 42 | if (iCo|de==XC_B|
|00000df0| 6c 61 63 6b 29 0d 0a 20 | 20 20 20 7b 0d 0a 20 20 |lack).. |   {..  |
|00000e00| 20 20 09 48 6f 6d 65 28 | 29 3b 0d 0a 20 20 20 20 |  .Home(|);..    |
|00000e10| 20 20 20 20 72 65 74 75 | 72 6e 20 74 72 75 65 3b |    retu|rn true;|
|00000e20| 0d 0a 20 20 20 20 7d 0d | 0a 0d 0a 20 20 20 20 65 |..    }.|...    e|
|00000e30| 6c 73 65 20 69 66 20 28 | 69 43 6f 64 65 3d 3d 58 |lse if (|iCode==X|
|00000e40| 43 5f 57 68 69 74 65 29 | 0d 0a 20 20 20 20 7b 0d |C_White)|..    {.|
|00000e50| 0a 20 20 20 20 09 45 6e | 64 28 29 3b 0d 0a 20 20 |.    .En|d();..  |
|00000e60| 20 20 20 20 20 20 72 65 | 74 75 72 6e 20 74 72 75 |      re|turn tru|
|00000e70| 65 3b 0d 0a 20 20 20 20 | 7d 0d 0a 0d 0a 20 20 20 |e;..    |}....   |
|00000e80| 20 65 6c 73 65 20 69 66 | 20 28 69 43 6f 64 65 3d | else if| (iCode=|
|00000e90| 3d 58 43 5f 58 29 0d 0a | 20 20 20 20 7b 0d 0a 20 |=XC_X)..|    {.. |
|00000ea0| 20 20 20 09 50 67 44 6f | 77 6e 28 29 3b 0d 0a 20 |   .PgDo|wn();.. |
|00000eb0| 20 20 20 20 20 20 20 72 | 65 74 75 72 6e 20 74 72 |       r|eturn tr|
|00000ec0| 75 65 3b 0d 0a 20 20 20 | 20 7d 0d 0a 0d 0a 20 20 |ue;..   | }....  |
|00000ed0| 20 20 65 6c 73 65 20 69 | 66 20 28 69 43 6f 64 65 |  else i|f (iCode|
|00000ee0| 3d 3d 58 43 5f 59 29 0d | 0a 20 20 20 20 7b 0d 0a |==XC_Y).|.    {..|
|00000ef0| 20 20 20 20 09 50 67 55 | 70 28 29 3b 0d 0a 20 20 |    .PgU|p();..  |
|00000f00| 20 20 20 20 20 20 72 65 | 74 75 72 6e 20 74 72 75 |      re|turn tru|
|00000f10| 65 3b 0d 0a 20 20 20 20 | 7d 0d 0a 0d 0a 09 65 6c |e;..    |}.....el|
|00000f20| 73 65 20 69 66 20 28 69 | 43 6f 64 65 3d 3d 58 43 |se if (i|Code==XC|
|00000f30| 5f 53 74 61 72 74 29 0d | 0a 20 20 20 20 7b 0d 0a |_Start).|.    {..|
|00000f40| 20 20 20 20 09 4f 6e 43 | 6c 69 63 6b 28 73 65 6c |    .OnC|lick(sel|
|00000f50| 66 29 3b 0d 0a 20 20 20 | 20 20 20 20 20 72 65 74 |f);..   |     ret|
|00000f60| 75 72 6e 20 74 72 75 65 | 3b 0d 0a 20 20 20 20 7d |urn true|;..    }|
|00000f70| 0d 0a 20 20 20 20 72 65 | 74 75 72 6e 20 66 61 6c |..    re|turn fal|
|00000f80| 73 65 3b 0d 0a 7d 0d 0a | 0d 0a 0d 0a 0d 0a 66 75 |se;..}..|......fu|
|00000f90| 6e 63 74 69 6f 6e 20 57 | 68 65 65 6c 55 70 28 29 |nction W|heelUp()|
|00000fa0| 0d 0a 7b 0d 0a 09 53 63 | 72 6f 6c 6c 4c 65 66 74 |..{...Sc|rollLeft|
|00000fb0| 28 29 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |();..}..|..functi|
|00000fc0| 6f 6e 20 57 68 65 65 6c | 44 6f 77 6e 28 29 0d 0a |on Wheel|Down()..|
|00000fd0| 7b 0d 0a 09 53 63 72 6f | 6c 6c 52 69 67 68 74 28 |{...Scro|llRight(|
|00000fe0| 29 3b 0d 0a 7d 0d 0a 09 | 0d 0a 66 75 6e 63 74 69 |);..}...|..functi|
|00000ff0| 6f 6e 20 53 63 72 6f 6c | 6c 4c 65 66 74 28 29 0d |on Scrol|lLeft().|
|00001000| 0a 7b 0d 0a 09 6c 6f 63 | 61 6c 20 69 6e 74 20 6c |.{...loc|al int l|
|00001010| 61 73 74 3b 0d 0a 0d 0a | 09 69 66 20 28 49 74 65 |ast;....|.if (Ite|
|00001020| 6d 43 6f 75 6e 74 3c 32 | 29 20 20 72 65 74 75 72 |mCount<2|)  retur|
|00001030| 6e 3b 0d 0a 0d 0a 09 4c | 61 73 74 20 3d 20 49 6e |n;.....L|ast = In|
|00001040| 64 65 78 3b 0d 0a 09 0d | 0a 09 69 66 20 28 49 6e |dex;....|..if (In|
|00001050| 64 65 78 3d 3d 30 29 0d | 0a 09 09 49 6e 64 65 78 |dex==0).|...Index|
|00001060| 3d 49 74 65 6d 43 6f 75 | 6e 74 2d 31 3b 0d 0a 09 |=ItemCou|nt-1;...|
|00001070| 65 6c 73 65 0d 0a 09 09 | 49 6e 64 65 78 2d 2d 3b |else....|Index--;|
|00001080| 0d 0a 09 09 0d 0a 09 69 | 66 20 28 4c 61 73 74 3d |.......i|f (Last=|
|00001090| 3d 54 6f 70 29 0d 0a 09 | 09 54 6f 70 3d 49 6e 64 |=Top)...|.Top=Ind|
|000010a0| 65 78 3b 0d 0a 0d 0a 09 | 4f 6e 43 68 61 6e 67 65 |ex;.....|OnChange|
|000010b0| 28 73 65 6c 66 29 3b 0d | 0a 0d 0a 7d 0d 0a 0d 0a |(self);.|...}....|
|000010c0| 66 75 6e 63 74 69 6f 6e | 20 53 63 72 6f 6c 6c 52 |function| ScrollR|
|000010d0| 69 67 68 74 28 29 0d 0a | 7b 0d 0a 09 6c 6f 63 61 |ight()..|{...loca|
|000010e0| 6c 20 69 6e 74 20 6c 61 | 73 74 3b 0d 0a 09 0d 0a |l int la|st;.....|
|000010f0| 09 69 66 20 28 49 74 65 | 6d 43 6f 75 6e 74 3c 32 |.if (Ite|mCount<2|
|00001100| 29 20 20 72 65 74 75 72 | 6e 3b 0d 0a 0d 0a 09 4c |)  retur|n;.....L|
|00001110| 61 73 74 20 3d 20 49 6e | 64 65 78 3b 0d 0a 09 0d |ast = In|dex;....|
|00001120| 0a 09 49 6e 64 65 78 2b | 2b 3b 0d 0a 09 69 66 20 |..Index+|+;...if |
|00001130| 28 49 6e 64 65 78 3d 3d | 49 74 65 6d 43 4f 75 6e |(Index==|ItemCOun|
|00001140| 74 29 0d 0a 09 09 49 6e | 64 65 78 20 3d 20 30 3b |t)....In|dex = 0;|
|00001150| 0d 0a 09 09 0d 0a 09 69 | 66 20 28 4c 61 73 74 3d |.......i|f (Last=|
|00001160| 3d 28 54 6f 70 2b 49 74 | 65 6d 73 50 65 72 50 61 |=(Top+It|emsPerPa|
|00001170| 67 65 2d 31 29 25 49 74 | 65 6d 43 6f 75 6e 74 29 |ge-1)%It|emCount)|
|00001180| 0d 0a 09 7b 0d 0a 09 09 | 54 6f 70 2b 2b 3b 0d 0a |...{....|Top++;..|
|00001190| 09 09 69 66 20 28 54 6f | 70 3d 3d 49 74 65 6d 43 |..if (To|p==ItemC|
|000011a0| 6f 75 6e 74 29 0d 0a 09 | 09 20 20 54 6f 70 3d 30 |ount)...|.  Top=0|
|000011b0| 3b 0d 0a 09 7d 0d 0a 09 | 0d 0a 09 4f 6e 43 68 61 |;...}...|...OnCha|
|000011c0| 6e 67 65 28 73 65 6c 66 | 29 3b 0d 0a 7d 0d 0a 09 |nge(self|);..}...|
|000011d0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 48 6f 6d 65 28 |..functi|on Home(|
|000011e0| 29 0d 0a 7b 0d 0a 09 69 | 66 20 28 49 74 65 6d 43 |)..{...i|f (ItemC|
|000011f0| 6f 75 6e 74 3c 32 29 09 | 72 65 74 75 72 6e 3b 09 |ount<2).|return;.|
|00001200| 0d 0a 0d 0a 09 53 65 74 | 49 6e 64 65 78 28 30 29 |.....Set|Index(0)|
|00001210| 3b 0d 0a 09 54 6f 70 20 | 3d 20 30 3b 0d 0a 0d 0a |;...Top |= 0;....|
|00001220| 09 4f 6e 43 68 61 6e 67 | 65 28 73 65 6c 66 29 3b |.OnChang|e(self);|
|00001230| 0d 0a 09 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |.....}..|..functi|
|00001240| 6f 6e 20 45 6e 64 28 29 | 0d 0a 7b 0d 0a 09 69 66 |on End()|..{...if|
|00001250| 20 28 49 74 65 6d 43 6f | 75 6e 74 3c 32 29 09 72 | (ItemCo|unt<2).r|
|00001260| 65 74 75 72 6e 3b 09 0d | 0a 0d 0a 09 54 6f 70 20 |eturn;..|....Top |
|00001270| 3d 20 49 74 65 6d 43 6f | 75 6e 74 20 2d 20 49 74 |= ItemCo|unt - It|
|00001280| 65 6d 73 50 65 72 50 61 | 67 65 3b 0d 0a 09 69 66 |emsPerPa|ge;...if|
|00001290| 20 28 54 6f 70 3c 30 29 | 0d 0a 09 09 54 6f 70 20 | (Top<0)|....Top |
|000012a0| 3d 20 30 3b 0d 0a 09 09 | 0d 0a 09 53 65 74 49 6e |= 0;....|...SetIn|
|000012b0| 64 65 78 28 49 74 65 6d | 43 6f 75 6e 74 2d 31 29 |dex(Item|Count-1)|
|000012c0| 3b 0d 0a 7d 09 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |;..}....|.functio|
|000012d0| 6e 20 50 67 55 70 28 29 | 0d 0a 7b 0d 0a 09 6c 6f |n PgUp()|..{...lo|
|000012e0| 63 61 6c 20 69 6e 74 20 | 6d 6f 76 65 43 6f 75 6e |cal int |moveCoun|
|000012f0| 74 2c 20 4c 61 73 74 3b | 0d 0a 0d 0a 09 69 66 20 |t, Last;|.....if |
|00001300| 28 49 74 65 6d 43 6f 75 | 6e 74 3c 32 29 20 20 72 |(ItemCou|nt<2)  r|
|00001310| 65 74 75 72 6e 3b 0d 0a | 0d 0a 09 66 6f 72 28 6d |eturn;..|...for(m|
|00001320| 6f 76 65 43 6f 75 6e 74 | 3d 30 3b 20 6d 6f 76 65 |oveCount|=0; move|
|00001330| 43 6f 75 6e 74 3c 49 74 | 65 6d 73 50 65 72 50 61 |Count<It|emsPerPa|
|00001340| 67 65 2d 31 3b 20 6d 6f | 76 65 43 6f 75 6e 74 2b |ge-1; mo|veCount+|
|00001350| 2b 29 0d 0a 09 7b 0d 0a | 09 09 4c 61 73 74 20 3d |+)...{..|..Last =|
|00001360| 20 49 6e 64 65 78 3b 0d | 0a 0d 0a 09 09 69 66 20 | Index;.|.....if |
|00001370| 28 49 6e 64 65 78 3d 3d | 30 29 0d 0a 09 09 09 49 |(Index==|0).....I|
|00001380| 6e 64 65 78 3d 49 74 65 | 6d 43 6f 75 6e 74 2d 31 |ndex=Ite|mCount-1|
|00001390| 3b 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 49 6e |;....els|e.....In|
|000013a0| 64 65 78 2d 2d 3b 0d 0a | 0d 0a 09 09 69 66 20 28 |dex--;..|....if (|
|000013b0| 4c 61 73 74 3d 3d 54 6f | 70 29 0d 0a 09 09 09 54 |Last==To|p).....T|
|000013c0| 6f 70 3d 49 6e 64 65 78 | 3b 0d 0a 09 7d 0d 0a 0d |op=Index|;...}...|
|000013d0| 0a 09 4f 6e 43 68 61 6e | 67 65 28 73 65 6c 66 29 |..OnChan|ge(self)|
|000013e0| 3b 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |;..}....|function|
|000013f0| 20 50 67 44 6f 77 6e 28 | 29 0d 0a 7b 0d 0a 09 6c | PgDown(|)..{...l|
|00001400| 6f 63 61 6c 20 69 6e 74 | 20 6d 6f 76 65 43 6f 75 |ocal int| moveCou|
|00001410| 6e 74 2c 20 4c 61 73 74 | 3b 0d 0a 0d 0a 09 69 66 |nt, Last|;.....if|
|00001420| 20 28 49 74 65 6d 43 6f | 75 6e 74 3c 32 29 20 20 | (ItemCo|unt<2)  |
|00001430| 72 65 74 75 72 6e 3b 0d | 0a 0d 0a 09 66 6f 72 28 |return;.|....for(|
|00001440| 6d 6f 76 65 43 6f 75 6e | 74 3d 30 3b 20 6d 6f 76 |moveCoun|t=0; mov|
|00001450| 65 43 6f 75 6e 74 3c 49 | 74 65 6d 73 50 65 72 50 |eCount<I|temsPerP|
|00001460| 61 67 65 2d 31 3b 20 6d | 6f 76 65 43 6f 75 6e 74 |age-1; m|oveCount|
|00001470| 2b 2b 29 0d 0a 09 7b 0d | 0a 09 09 4c 61 73 74 20 |++)...{.|...Last |
|00001480| 3d 20 49 6e 64 65 78 3b | 0d 0a 0d 0a 09 09 49 6e |= Index;|......In|
|00001490| 64 65 78 2b 2b 3b 0d 0a | 09 09 69 66 20 28 49 6e |dex++;..|..if (In|
|000014a0| 64 65 78 3d 3d 49 74 65 | 6d 43 4f 75 6e 74 29 0d |dex==Ite|mCOunt).|
|000014b0| 0a 09 09 09 49 6e 64 65 | 78 20 3d 20 30 3b 0d 0a |....Inde|x = 0;..|
|000014c0| 0d 0a 09 09 69 66 20 28 | 4c 61 73 74 3d 3d 28 54 |....if (|Last==(T|
|000014d0| 6f 70 2b 49 74 65 6d 73 | 50 65 72 50 61 67 65 2d |op+Items|PerPage-|
|000014e0| 31 29 25 49 74 65 6d 43 | 6f 75 6e 74 29 0d 0a 09 |1)%ItemC|ount)...|
|000014f0| 09 7b 0d 0a 09 09 09 54 | 6f 70 2b 2b 3b 0d 0a 09 |.{.....T|op++;...|
|00001500| 09 09 69 66 20 28 54 6f | 70 3d 3d 49 74 65 6d 43 |..if (To|p==ItemC|
|00001510| 6f 75 6e 74 29 0d 0a 09 | 09 09 09 54 6f 70 3d 30 |ount)...|...Top=0|
|00001520| 3b 0d 0a 09 09 7d 0d 0a | 09 7d 0d 0a 0d 0a 09 4f |;....}..|.}.....O|
|00001530| 6e 43 68 61 6e 67 65 28 | 73 65 6c 66 29 3b 0d 0a |nChange(|self);..|
|00001540| 7d 0d 0a 09 09 0d 0a 0d | 0a 00                   |}.......|..      |
+--------+-------------------------+-------------------------+--------+--------+